<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><title>R: Snowfall data for Grand Rapids, MI</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link rel="stylesheet" type="text/css" href="R.css" />
</head><body>

<table width="100%" summary="page for SnowGR"><tr><td>SnowGR</td><td style="text-align: right;">R Documentation</td></tr></table>

<h2>Snowfall data for Grand Rapids, MI</h2>

<h3>Description</h3>

<p>Official snowfall data by month and season for Grand Rapids, MI, going back to 1893.
</p>


<h3>Usage</h3>

<pre>
data(SnowGR)
</pre>


<h3>Format</h3>

<p>A data frame with 119 observations of the following variables.
</p>

<ul>
<li> <p><code>SeasonStart</code> Year in which season started (July is start of season)
</p>
</li>
<li> <p><code>SeasonEnd</code> Year in which season ended (June is end of season)
</p>
</li>
<li> <p><code>Jul</code> Inches of snow in July
</p>
</li>
<li> <p><code>Aug</code> Inches of snow in August
</p>
</li>
<li> <p><code>Sep</code> Inches of snow in September
</p>
</li>
<li> <p><code>Oct</code> Inches of snow in October
</p>
</li>
<li> <p><code>Nov</code> Inches of snow in November
</p>
</li>
<li> <p><code>Dec</code> Inches of snow in December
</p>
</li>
<li> <p><code>Jan</code> Inches of snow in January
</p>
</li>
<li> <p><code>Feb</code> Inches of snow in February
</p>
</li>
<li> <p><code>Mar</code> Inches of snow in March
</p>
</li>
<li> <p><code>Apr</code> Inches of snow in April
</p>
</li>
<li> <p><code>May</code> Inches of snow in May
</p>
</li>
<li> <p><code>Jun</code> Inches of snow in June
</p>
</li>
<li> <p><code>Total</code> Inches of snow for entire season (July-June)
</p>
</li></ul>



<h3>Source</h3>

<p>These data were compiled by Laura Kapitula from data available
from NOAA. The original URL used
(http://www.crh.noaa.gov/grr/climate/data/grr/snowfall/)
is no longer in service.
</p>


<h3>Examples</h3>

<pre>
data(SnowGR)
if (require(mosaic)) {
  df_stats(~ Total, data = SnowGR)
  gf_histogram( ~ Total, data = SnowGR)
  gf_point(Total ~ SeasonStart, data = SnowGR) %&gt;%
    gf_smooth()
}
if (require(tidyr)) {
  Snow2 &lt;- 
    SnowGR %&gt;%
    gather("Time", "Snowfall", Jul:Total) 
  gf_boxplot(Snowfall ~ Time, data = Snow2)
}

</pre>


</body></html>
